home *** CD-ROM | disk | FTP | other *** search
/ Digital Talk 8 / Digital_Talk_08_1994-07-17_Digital_Talk_de_Side_D.d64 / uhrzeit .bas (.txt) < prev   
Commodore BASIC  |  2023-02-26  |  291b  |  15 lines
  1. 10 poke53280,0:poke53281,15:poke646,0
  2. 20 :
  3. 30 print"[147] uhrzeit demo"
  4. 40 :
  5. 50 print" gib bitte die aktuelle uhrzeit ein."
  6. 60 input" format :  stmise[157][157][157][157][157][157][157][157]";ti$
  7. 70 :
  8. 80 print"[147]";
  9. 90 print"";
  10. 100 print" uhrzeit (ti$)    : ";ti$
  11. 110 print" 1/60 sec. (ti)   : ";ti
  12. 120 print" sec (int(ti/60)) : ";int(ti/60)
  13. 130 :
  14. 140 goto 90
  15.